www.gusucode.com > 深度学习(asp)网址导航 v4.0.1 > 深度学习(asp)网址导航 v4.0.1\code\admin\channel\channel_Add.asp
<%@LANGUAGE="VBSCRIPT" CODEPAGE="936"%>
<%
projectRootPath = "../../" '相对当前应用程序根的位置
%>
<!-- #include file ="../include/checkPurview.asp"-->
<!--#include file="../../ConnDB.asp"-->
<!-- #include file="../include/Function.Manage.Config.asp"-->
<!--#include file="../../include/function.Common.asp"-->
<!DOCTYPE html PUBLIC "-//W3C//DTD XHTML 1.0 Transitional//EN" "http://www.w3.org/TR/xhtml1/DTD/xhtml1-transitional.dtd">
<html xmlns="http://www.w3.org/1999/xhtml">
<head>
<meta name="robots" content="noindex,nofollow" />
<meta http-equiv="Content-Type" content="text/html; charset=gb2312" />
<title>频道栏目添加</title>
<link rel="stylesheet" type="text/css" href="../themes/base.css"/>
<link href="../themes/<%=theme_Path%>/main.css" rel="stylesheet" type="text/css" />
<script language="javascript">
function form1_onsubmit()
{
if (document.form1.ChannelName.value=="")
{
window.alert("请输入栏目名称");
document.form1.ChannelName.focus();
return false;
}
}
function view(m)
{
var viewType0=document.getElementById("viewType0");
var viewType1a=document.getElementById("viewType1a");
var viewType1b=document.getElementById("viewType1b");
switch (m){
case "viewType0":
viewType0.style.display="block";
viewType1a.style.display="none";
viewType1b.style.display="none";
break;
case "viewType1":
viewType0.style.display="none";
viewType1a.style.display="block";
viewType1b.style.display="block";
break;
}
}
</script>
</head>
<body id="bodyBg1">
<br />
<a href="channel_Manage.asp">频道栏目管理</a> | <a href="channel_Add.asp">频道栏目添加</a>
<hr class="Nav-hr" />
<br />
<dl class="manageContent">
<dt>频道栏目添加管理</dt>
<dd>
<br />
<%
if Request.Form("ChannelName") <> "" then
ChannelName=Request.Form("ChannelName")
OrderID=Request.Form("OrderID")
Readme=Request.Form("Readme")
Place=Request.Form("Place")
ViewType=Request.Form("ViewType")
LinkUrl=Request.Form("LinkUrl")
ContentTittle=Request.Form("ContentTittle")
Content=Request.Form("Content")
isView=Request.Form("isView")
fchannelPic=Request.Form("fchannelPic")
fuploadFiles=Request.Form("fuploadFiles")
fparentID=Request.Form("fparentID")
openTarget=Request.Form("openTarget")
Set RsChannelADD=Server.CreateObject("Adodb.Recordset")
sql="Select * from deep_Channel"
RsChannelADD.open sql,conn,3,2
RsChannelADD.addnew
RsChannelADD("fname")=ChannelName
RsChannelADD("ftip")=Readme
RsChannelADD("fviewType")=ViewType
RsChannelADD("flinkUrl")=LinkUrl
RsChannelADD("fcontentTitle")=ContentTittle
RsChannelADD("fcontent")=Content
RsChannelADD("fplace")=Place
RsChannelADD("forderID")=OrderID
RsChannelADD("fisView")=isView
RsChannelADD("fchannelPic")=fchannelPic
RsChannelADD("fuploadFiles")=fuploadFiles
RsChannelADD("fparentID")=fparentID
RsChannelADD("openTarget")=openTarget
RsChannelADD.update
RsChannelADD.close
Set RsChannelADD=Nothing
Response.Write("<p align='center'>频道栏目：["& ChannelName &"] 添加成功</p>")
end if
%>
<form id="form1" name="form1" method="post" action="channel_Add.asp" onSubmit="return form1_onsubmit()">
<table width="99%" border="0" align="center" class="tableBoderForm">
<tr>
<td>频道栏目名称：</td>
<td><input name="ChannelName" type="text" size="40" />
<span class="cRed">*</span></td>
</tr>
<tr>
<td>所属栏目分类：</td>
<td>
<select name="fparentID" id="fparentID">
<option value="0"> 根（作为一级栏目）</option>
<%
sql_channelClass="Select * from deep_Channel where fparentID=0 order by fOrderID"
Set rsChannelClass=conn.execute(sql_channelClass)
if rsChannelClass.Eof and rsChannelClass.Bof then
Response.Write("<option>暂时没有栏目！！！</option>")
else
while (not rsChannelClass.eof)
%>
<option value="<%=rsChannelClass("fid")%>"><%=rsChannelClass("fname")%></option>
<%
call getSubList(rsChannelClass("fid"),0,0,"Select fid,fparentID,fname from deep_Channel")
rsChannelClass.MoveNext
wend
end if
rsChannelClass.close
Set rsChannelClass =Nothing
%>
</select>
</td>
</tr>
<tr>
<td>栏目简介：</td>
<td><textarea name="ReadMe" cols="70" rows="3"></textarea></td>
</tr>
<tr>
<td>排序ID：</td>
<td><input name="OrderID" type="text" value="0" /></td>
</tr>
<tr>
<td>显示位置：</td>
<td><input name="Place" type="radio" value="0" checked="checked" />网页上部
<input type="radio" name="Place" value="1" />网页下部
<input type="radio" name="Place" value="2" />网页顶部
</td>
</tr>
<tr>
<td>首页图文：</td>
<td><input name="fchannelPic" type="text" id="fchannelPic" size="60" /><br />
<iframe ID="UploadFiles" src="../include/upload_form.asp?SavePath=../../uploadFile/channel/&parentBackValue=form1.fchannelPic&MaxSize=500&FileType=gif/jpg/png/bmp&saveName=0" frameborder="0" scrolling="no" width="600" height="25"></iframe>
<br />上传图片尺寸视网站效果自定 </td>
</tr>
<tr>
<td>显示方式：</td>
<td><input name="ViewType" type="radio" value="0" onClick="view('viewType0')" />链接地址
<input type="radio" name="ViewType" value="1" checked="checked" onclick="view('viewType1')" />内容页
( * 首页图文时仅标题内容有效)
</td>
</tr>
<tr>
<td>打开方式：</td>
<td><input name="openTarget" type="radio" id="radio3" value="0" checked="checked" />原窗口
<input type="radio" name="openTarget" id="radio4" value="1" />新窗口</td>
</tr>
<tr id="viewType0" style="display:none;" >
<td>链接地址：</td>
<td><input name="LinkUrl" type="text" id="LinkUrl" size="70" /></td>
</tr>
<tr id="viewType1a" >
<td>内容标题：</td>
<td><input name="ContentTittle" type="text" size="70" ></td>
</tr>
<tr id="viewType1b" >
<td>内容：</td>
<td><textarea name="Content" style="display:none"></textarea>
<iframe id="eWebEditor1" src="../include/eWebEditor/eWebEditor.asp?id=Content&style=deep_light_channel&savefilename=fuploadFiles" frameborder="0" scrolling="no" width="650" height="400"></iframe>
<input type="hidden" name="fuploadFiles" id="fuploadFiles" />
<%
' ewebeditor.asp文件调用的参数：
' id：下面表单项textarea的名称，在此表单中是Content，注意大小写
' style：编辑器的样式名称，可在eWebEditor的后台设置
' originalfilename：用于获取源文件名(上传前的原文件名)，
' savefilename：用于获取保存文件名(上传后的文件名)， 在此表单中是fuploadFiles
' savepathfilename：用于获取保存带路径文件名(上传后的文件名)，
%>
</td>
</tr>
<tr>
<td>显示：</td>
<td><input name="isView" type="radio" id="radio" value="1" checked="checked" />显示
<input name="isView" type="radio" id="radio2" value="0" />不显示</td>
</tr>
<tr>
<td> </td>
<td><input type="submit" name="Submit" value="提交" />
<input type="reset" name="Reset" value="重置" />
</td>
</tr>
</table>
</form>
<br />
</dd>
</dl>
<br />
<p align="center"><span class="cRed">*</span> 必添内容</p>
</body>
</html>
<%
Call CloseConnDB()
%>